home *** CD-ROM | disk | FTP | other *** search
/ C/C++ Users Group Library 1996 July / C-C++ Users Group Library July 1996.iso / vol_400 / 422_02 / laptalk / phone.scr < prev    next >
Text File  |  1994-03-20  |  525b  |  19 lines
  1. rem Example of a simple phone menu implementation
  2.  
  3. rem This script gives an example of a "computed goto", based on the
  4. rem selection from a "menu" statement.
  5.  
  6. rem Note that "System4" performs several commands, switching to a different
  7. rem configuration, invoking terminal mode, and then switching back.
  8.  
  9. menu A System1 System2 System3 System4
  10. goto +\A
  11. :-1 error No system dialed!
  12. :0 chain dial 555-1234
  13. :1 chain dial 555-1235
  14. :2 chain dial 555-1236
  15. :3 config host
  16. call dial 555-1237
  17. terminal
  18. config laptalk
  19.